object FrmTestPerTanimla: TFrmTestPerTanimla
  Left = 256
  Top = 125
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'Test Personeli Tan'#305'mlama'
  ClientHeight = 392
  ClientWidth = 443
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDesktopCenter
  Visible = True
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel3: TPanel
    Left = 8
    Top = 8
    Width = 273
    Height = 377
    TabOrder = 0
    object Label5: TLabel
      Left = 8
      Top = 8
      Width = 48
      Height = 14
      Caption = 'Test Yeri'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label6: TLabel
      Left = 8
      Top = 32
      Width = 80
      Height = 14
      Caption = 'Test Personeli'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object BitBtn3: TBitBtn
      Left = 185
      Top = 348
      Width = 75
      Height = 25
      Caption = '&Kapat'
      TabOrder = 0
      OnClick = BitBtn3Click
      NumGlyphs = 2
    end
    object wwDBGrid6: TwwDBGrid
      Left = 7
      Top = 80
      Width = 253
      Height = 264
      DisableThemes = False
      ControlType.Strings = (
        'perkod;CustomEdit;personelk;T')
      Selected.Strings = (
        'perkod'#9'36'#9'Personel'#9'F')
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = True
      DataSource = p_tekniktipi_calisanQS
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      KeyOptions = []
      ParentFont = False
      PopupMenu = PopupMenu1
      TabOrder = 1
      TitleAlignment = taLeftJustify
      TitleFont.Charset = TURKISH_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'Arial'
      TitleFont.Style = [fsBold]
      TitleLines = 1
      TitleButtons = False
      UseTFields = False
    end
    object personelk: TwwDBLookupCombo
      Left = 24
      Top = 248
      Width = 220
      Height = 21
      DisableThemes = False
      DropDownAlignment = taLeftJustify
      Selected.Strings = (
        'pismi'#9'40'#9'Personel'#9'F')
      DataField = 'perkod'
      DataSource = p_tekniktipi_calisanQS
      LookupTable = dm.sppersonel
      LookupField = 'perkod'
      Style = csDropDownList
      Navigator = False
      TabOrder = 2
      AutoDropDown = True
      ShowButton = True
      UseTFields = False
      AllowClearKey = False
    end
    object durumustk: TwwDBComboBox
      Left = 105
      Top = 4
      Width = 155
      Height = 21
      ShowButton = True
      Style = csDropDownList
      MapList = True
      AllowClearKey = True
      AutoDropDown = True
      DropDownCount = 8
      ItemHeight = 0
      Items.Strings = (
        'Masa'#252'st'#252' Bilgisayar'#9'S'
        'Diz'#252'st'#252' Bilgisayar'#9'N')
      ItemIndex = 0
      Sorted = False
      TabOrder = 3
      UnboundDataType = wwDefault
      OnCloseUp = durumustkCloseUp
    end
    object PerEkle: TwwDBLookupCombo
      Left = 105
      Top = 29
      Width = 155
      Height = 21
      DisableThemes = False
      DropDownAlignment = taLeftJustify
      Selected.Strings = (
        'pismi'#9'40'#9'Personel'#9'F')
      LookupTable = dm.sppersonel
      LookupField = 'perkod'
      Style = csDropDownList
      Navigator = False
      TabOrder = 4
      AutoDropDown = True
      ShowButton = True
      UseTFields = False
      AllowClearKey = False
    end
    object Button1: TButton
      Left = 208
      Top = 56
      Width = 49
      Height = 17
      Caption = 'Ekle'
      TabOrder = 5
      OnClick = Button1Click
    end
  end
  object p_tekniktipi_calisanQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select TP.perkod,P.Adi + '#39' '#39' + P.Soyadi as AdSoyad  from Test_Pe' +
        'rsonel TP Join Perkart P on TP.perkod=P.perkod ')
    Left = 344
    Top = 32
  end
  object p_tekniktipi_calisanQS: TDataSource
    DataSet = p_tekniktipi_calisanQ
    Left = 344
    Top = 88
  end
  object ADOTemp: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select TP.perkod,P.Adi + '#39' '#39' + P.Soyadi as AdSoyad  from Test_Pe' +
        'rsonel TP Join Perkart P on TP.perkod=P.perkod ')
    Left = 344
    Top = 144
  end
  object PopupMenu1: TPopupMenu
    Left = 160
    Top = 192
    object Sil1: TMenuItem
      Caption = 'Sil'
      OnClick = Sil1Click
    end
  end
end
